home *** CD-ROM | disk | FTP | other *** search
- ; Startup sequence for Hard Disk users...checks for hard disk, then
- ; transfers control if it is present. (The script assumes FH0: and FH1:)
- ;
- Setpatch >NIL:
- binddrivers
- mount fh0: from BOOT:devs/MountList.HD
- mount fh1: from BOOT:devs/MountList.HD
- assign >NIL: FH0: exists
- IF NOT WARN
- ; hard disk is present
- assign sys: FH0:
- assign c: SYS:c
- assign L: SYS:l
- assign FONTS: SYS:fonts
- assign S: SYS:s
- assign DEVS: SYS:devs
- assign LIBS: SYS:libs
- makedir ram:tr
- assign t: ram:tr
- execute s:Startup-Sequence
- ELSE
- ; no hard disk
- echo "hard drive FH0: not found!"
- ENDIF
-